home *** CD-ROM | disk | FTP | other *** search
/ Tech Arsenal 1 / Tech Arsenal (Arsenal Computer).ISO / tek-01 / flilib.zip / FLISRC.ZIP / JKEYSHIF.ASM < prev    next >
Assembly Source File  |  1989-11-10  |  256b  |  18 lines
  1.  
  2. _TEXT    SEGMENT  BYTE PUBLIC 'CODE'
  3.  
  4.     ASSUME  CS: _TEXT 
  5.  
  6.     public _dos_key_shift
  7. ;_dos_key_shift() 
  8. ;    returns keyboard shift/control/alt state
  9. _dos_key_shift proc far
  10.     mov ah,2
  11.     int 16h
  12.     and ax,0ffh
  13.     ret
  14. _dos_key_shift endp
  15.  
  16. _TEXT    ENDS
  17. END
  18.